home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 22 / Cream of the Crop 22.iso / games / zmud32.zip / ZMUD.EXE / 0 / RCDATA / TMACROD / TMACROD.txt
Text File  |  1996-08-04  |  17KB  |  609 lines
  1. object Macrod: TMacrod
  2.   Left = 156
  3.   Top = 90
  4.   ActiveControl = OKBtn
  5.   BorderStyle = bsDialog
  6.   Caption = 'Macro Keys'
  7.   ClientHeight = 294
  8.   ClientWidth = 535
  9.   Font.Color = clBlack
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = [fsBold]
  13.   ShowHint = True
  14.   OnActivate = FormActivate
  15.   OnClose = FormClose
  16.   OnCreate = FormCreate
  17.   OnDestroy = FormDestroy
  18.   OnDeactivate = FormDeactivate
  19.   PixelsPerInch = 96
  20.   TextHeight = 13
  21.   object Label7: TLabel
  22.     Left = 8
  23.     Top = 32
  24.     Width = 87
  25.     Height = 13
  26.     Caption = 'Stored Macros:'
  27.   end
  28.   object Label8: TLabel
  29.     Left = 8
  30.     Top = 48
  31.     Width = 156
  32.     Height = 13
  33.     Caption = 'Click on an macro below to edit it'
  34.     Font.Color = clBlack
  35.     Font.Height = -11
  36.     Font.Name = 'MS Sans Serif'
  37.     Font.Style = []
  38.     ParentFont = False
  39.   end
  40.   object Image1: TImage
  41.     Left = 184
  42.     Top = 32
  43.     Width = 32
  44.     Height = 32
  45.     AutoSize = True
  46.   end
  47.   object Bevel1: TBevel
  48.     Left = 168
  49.     Top = 32
  50.     Width = 9
  51.     Height = 257
  52.     Shape = bsLeftLine
  53.   end
  54.   object Label3: TLabel
  55.     Left = 224
  56.     Top = 40
  57.     Width = 273
  58.     Height = 13
  59.     Caption = 'Macros allow you to assign a series of commands to a key'
  60.     Font.Color = clBlack
  61.     Font.Height = -11
  62.     Font.Name = 'MS Sans Serif'
  63.     Font.Style = []
  64.     ParentFont = False
  65.   end
  66.   object Label4: TLabel
  67.     Left = 240
  68.     Top = 56
  69.     Width = 256
  70.     Height = 13
  71.     Caption = 'Edit the name of the key, or press the keyboard button'
  72.     Font.Color = clBlack
  73.     Font.Height = -11
  74.     Font.Name = 'MS Sans Serif'
  75.     Font.Style = []
  76.     ParentFont = False
  77.   end
  78.   object Label5: TLabel
  79.     Left = 240
  80.     Top = 86
  81.     Width = 272
  82.     Height = 13
  83.     Caption = 'Enter the commands to be executed in the Command field'
  84.     Font.Color = clBlack
  85.     Font.Height = -11
  86.     Font.Name = 'MS Sans Serif'
  87.     Font.Style = []
  88.     ParentFont = False
  89.   end
  90.   object AliasText: TLabel
  91.     Left = 212
  92.     Top = 130
  93.     Width = 21
  94.     Height = 13
  95.     Alignment = taRightJustify
  96.     Caption = 'Key:'
  97.     Font.Color = clBlack
  98.     Font.Height = -11
  99.     Font.Name = 'MS Sans Serif'
  100.     Font.Style = []
  101.     ParentFont = False
  102.   end
  103.   object ComText: TLabel
  104.     Left = 178
  105.     Top = 154
  106.     Width = 55
  107.     Height = 13
  108.     Alignment = taRightJustify
  109.     Caption = 'Commands:'
  110.     Font.Color = clBlack
  111.     Font.Height = -11
  112.     Font.Name = 'MS Sans Serif'
  113.     Font.Style = []
  114.     ParentFont = False
  115.   end
  116.   object Label1: TLabel
  117.     Left = 256
  118.     Top = 70
  119.     Width = 128
  120.     Height = 13
  121.     Caption = 'to select a key interactively'
  122.     Font.Color = clBlack
  123.     Font.Height = -11
  124.     Font.Name = 'MS Sans Serif'
  125.     Font.Style = []
  126.     ParentFont = False
  127.   end
  128.   object SpeedButton1: TSpeedButton
  129.     Left = 326
  130.     Top = 128
  131.     Width = 20
  132.     Height = 20
  133.     Hint = 'Select a key for the macro|'
  134.     Glyph.Data = {
  135.       10010000424D1001000000000000760000002800000010000000100000000100
  136.       0400000000008000000000000000000000000000000000000000000000000000
  137.       80000080000000808000800000008000800080800000C0C0C000808080000000
  138.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  139.       333333333333333333333300000000000033300888888888800330F888888888
  140.       880330FF88888888880330FF77777777780330FF70770777780330FF70770777
  141.       780330FF70000777780330FF70770777780330FF770077777803300F77777777
  142.       7003330000000000003333333333333333333333333333333333000000000000
  143.       0000000000000000000000000000000000000000}
  144.     OnClick = SpeedButton1Click
  145.   end
  146.   object HelpTxt: TLabel
  147.     Left = 256
  148.     Top = 100
  149.     Width = 218
  150.     Height = 13
  151.     Caption = 'separate multiple commands with a ; character'
  152.     Font.Color = clBlack
  153.     Font.Height = -11
  154.     Font.Name = 'MS Sans Serif'
  155.     Font.Style = []
  156.     ParentFont = False
  157.   end
  158.   object Label2: TLabel
  159.     Left = 8
  160.     Top = 62
  161.     Width = 120
  162.     Height = 13
  163.     Caption = 'Double click to execute it'
  164.     Font.Color = clBlack
  165.     Font.Height = -11
  166.     Font.Name = 'MS Sans Serif'
  167.     Font.Style = []
  168.     ParentFont = False
  169.   end
  170.   object SpeedButton2: TSpeedButton
  171.     Left = 240
  172.     Top = 152
  173.     Width = 20
  174.     Height = 20
  175.     Hint = 'Edit command|'
  176.     Glyph.Data = {
  177.       78010000424D7801000000000000760000002800000020000000100000000100
  178.       04000000000000000000120B0000120B00000000000000000000000000000000
  179.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  180.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
  181.       000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
  182.       00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
  183.       F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
  184.       0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
  185.       FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
  186.       FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
  187.       0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
  188.       00333377737FFFFF7733333033000000033333373377777773330000}
  189.     NumGlyphs = 2
  190.     OnClick = SpeedButton2Click
  191.   end
  192.   object Inh: TLabel
  193.     Left = 240
  194.     Top = 184
  195.     Width = 188
  196.     Height = 13
  197.     Caption = 'Inherited from parent settings file'
  198.     Font.Color = clRed
  199.     Font.Height = -11
  200.     Font.Name = 'MS Sans Serif'
  201.     Font.Style = [fsBold]
  202.     ParentFont = False
  203.     Visible = False
  204.   end
  205.   object OKBtn: TBitBtn
  206.     Left = 280
  207.     Top = 260
  208.     Width = 77
  209.     Height = 27
  210.     Caption = 'OK'
  211.     Default = True
  212.     Font.Color = clBlack
  213.     Font.Height = -11
  214.     Font.Name = 'MS Sans Serif'
  215.     Font.Style = []
  216.     ModalResult = 1
  217.     ParentFont = False
  218.     TabOrder = 0
  219.     OnClick = OKBtnClick
  220.     Margin = 2
  221.     NumGlyphs = 2
  222.     Spacing = -1
  223.     IsControl = True
  224.   end
  225.   object CancelBtn: TBitBtn
  226.     Left = 364
  227.     Top = 260
  228.     Width = 77
  229.     Height = 27
  230.     Cancel = True
  231.     Caption = 'Cancel'
  232.     Font.Color = clBlack
  233.     Font.Height = -11
  234.     Font.Name = 'MS Sans Serif'
  235.     Font.Style = []
  236.     ModalResult = 2
  237.     ParentFont = False
  238.     TabOrder = 1
  239.     OnClick = CancelBtnClick
  240.     Margin = 2
  241.     NumGlyphs = 2
  242.     Spacing = -1
  243.     IsControl = True
  244.   end
  245.   object HelpBtn: TBitBtn
  246.     Left = 448
  247.     Top = 260
  248.     Width = 77
  249.     Height = 27
  250.     HelpContext = 102
  251.     Caption = '&Help'
  252.     Font.Color = clBlack
  253.     Font.Height = -11
  254.     Font.Name = 'MS Sans Serif'
  255.     Font.Style = []
  256.     ParentFont = False
  257.     TabOrder = 2
  258.     Margin = 2
  259.     NumGlyphs = 2
  260.     Spacing = -1
  261.     IsControl = True
  262.   end
  263.   object MacroList: TListBox
  264.     Left = 8
  265.     Top = 80
  266.     Width = 154
  267.     Height = 169
  268.     ExtendedSelect = False
  269.     Font.Color = clBlack
  270.     Font.Height = -11
  271.     Font.Name = 'MS Sans Serif'
  272.     Font.Style = []
  273.     ItemHeight = 13
  274.     ParentFont = False
  275.     Sorted = True
  276.     TabOrder = 3
  277.     OnClick = MacroListClick
  278.     OnDblClick = MacroListDblClick
  279.     OnMouseDown = MacroListMouseDown
  280.   end
  281.   object NewBtn: TBitBtn
  282.     Left = 8
  283.     Top = 260
  284.     Width = 62
  285.     Height = 27
  286.     Caption = '&New'
  287.     Font.Color = clBlack
  288.     Font.Height = -11
  289.     Font.Name = 'MS Sans Serif'
  290.     Font.Style = []
  291.     ParentFont = False
  292.     TabOrder = 4
  293.     OnClick = NewBtnClick
  294.     Margin = 2
  295.     NumGlyphs = 2
  296.     Spacing = -1
  297.     IsControl = True
  298.   end
  299.   object KeyName: TEdit
  300.     Left = 240
  301.     Top = 128
  302.     Width = 81
  303.     Height = 21
  304.     Font.Color = clBlack
  305.     Font.Height = -11
  306.     Font.Name = 'MS Sans Serif'
  307.     Font.Style = []
  308.     ParentFont = False
  309.     TabOrder = 5
  310.     Text = 'KeyName'
  311.     OnChange = KeyNameChange
  312.   end
  313.   object KeyCom: TEdit
  314.     Left = 264
  315.     Top = 152
  316.     Width = 241
  317.     Height = 21
  318.     Font.Color = clBlack
  319.     Font.Height = -11
  320.     Font.Name = 'MS Sans Serif'
  321.     Font.Style = []
  322.     ParentFont = False
  323.     TabOrder = 6
  324.     Text = 'KeyCom'
  325.     OnChange = KeyComChange
  326.   end
  327.   object Key: TEdit
  328.     Left = 360
  329.     Top = 128
  330.     Width = 81
  331.     Height = 21
  332.     Font.Color = clBlack
  333.     Font.Height = -11
  334.     Font.Name = 'MS Sans Serif'
  335.     Font.Style = []
  336.     ParentFont = False
  337.     TabOrder = 7
  338.     Text = 'Key'
  339.     Visible = False
  340.   end
  341.   object Panel2: TPanel
  342.     Left = 0
  343.     Top = 0
  344.     Width = 535
  345.     Height = 22
  346.     Align = alTop
  347.     BevelOuter = bvNone
  348.     Caption = 'Panel1'
  349.     TabOrder = 8
  350.     object Panel3: TPanel
  351.       Left = 0
  352.       Top = 0
  353.       Width = 23
  354.       Height = 22
  355.       Align = alLeft
  356.       BevelOuter = bvNone
  357.       TabOrder = 0
  358.       object TopBtn: TSpeedButton
  359.         Left = 0
  360.         Top = 0
  361.         Width = 22
  362.         Height = 22
  363.         Hint = 'Keep on top|'
  364.         AllowAllUp = True
  365.         GroupIndex = 1
  366.         NumGlyphs = 2
  367.         OnClick = TopBtnClick
  368.       end
  369.     end
  370.     object Panel4: TPanel
  371.       Left = 23
  372.       Top = 0
  373.       Width = 512
  374.       Height = 22
  375.       Align = alClient
  376.       TabOrder = 1
  377.       object WalkBtn: TPanel
  378.         Left = 338
  379.         Top = 1
  380.         Width = 88
  381.         Height = 20
  382.         Align = alLeft
  383.         Alignment = taLeftJustify
  384.         BevelOuter = bvNone
  385.         Caption = 'Speed&walking'
  386.         Font.Color = clBlack
  387.         Font.Height = -11
  388.         Font.Name = 'MS Sans Serif'
  389.         Font.Style = []
  390.         ParentFont = False
  391.         TabOrder = 0
  392.         OnClick = WalkBtnClick
  393.       end
  394.       object TrigBtn: TPanel
  395.         Left = 274
  396.         Top = 1
  397.         Width = 64
  398.         Height = 20
  399.         Align = alLeft
  400.         Alignment = taLeftJustify
  401.         BevelOuter = bvNone
  402.         Caption = '&Triggers'
  403.         Font.Color = clBlack
  404.         Font.Height = -11
  405.         Font.Name = 'MS Sans Serif'
  406.         Font.Style = []
  407.         ParentFont = False
  408.         TabOrder = 1
  409.         OnClick = TrigBtnClick
  410.       end
  411.       object ButBtn: TPanel
  412.         Left = 210
  413.         Top = 1
  414.         Width = 64
  415.         Height = 20
  416.         Align = alLeft
  417.         Alignment = taLeftJustify
  418.         BevelOuter = bvNone
  419.         Caption = '&Buttons'
  420.         Font.Color = clBlack
  421.         Font.Height = -11
  422.         Font.Name = 'MS Sans Serif'
  423.         Font.Style = []
  424.         ParentFont = False
  425.         TabOrder = 2
  426.         OnClick = ButBtnClick
  427.       end
  428.       object VarBtn: TPanel
  429.         Left = 82
  430.         Top = 1
  431.         Width = 64
  432.         Height = 20
  433.         Align = alLeft
  434.         Alignment = taLeftJustify
  435.         BevelOuter = bvNone
  436.         Caption = '&Variables'
  437.         Font.Color = clBlack
  438.         Font.Height = -11
  439.         Font.Name = 'MS Sans Serif'
  440.         Font.Style = []
  441.         ParentFont = False
  442.         TabOrder = 3
  443.         OnClick = VarBtnClick
  444.       end
  445.       object Panel7: TPanel
  446.         Left = 18
  447.         Top = 1
  448.         Width = 64
  449.         Height = 20
  450.         Align = alLeft
  451.         Alignment = taLeftJustify
  452.         BevelOuter = bvNone
  453.         Caption = '&Aliases'
  454.         Font.Color = clBlack
  455.         Font.Height = -11
  456.         Font.Name = 'MS Sans Serif'
  457.         Font.Style = []
  458.         ParentFont = False
  459.         TabOrder = 4
  460.         OnClick = AliasBtnClick
  461.       end
  462.       object Panel5: TPanel
  463.         Left = 1
  464.         Top = 1
  465.         Width = 17
  466.         Height = 20
  467.         Align = alLeft
  468.         BevelOuter = bvNone
  469.         TabOrder = 5
  470.       end
  471.       object Panel6: TPanel
  472.         Left = 146
  473.         Top = 1
  474.         Width = 64
  475.         Height = 20
  476.         Align = alLeft
  477.         Alignment = taLeftJustify
  478.         BevelOuter = bvNone
  479.         Caption = '&Macros'
  480.         Font.Color = clBlack
  481.         Font.Height = -11
  482.         Font.Name = 'MS Sans Serif'
  483.         Font.Style = []
  484.         ParentFont = False
  485.         TabOrder = 6
  486.         OnClick = MacroBtnClick
  487.       end
  488.     end
  489.   end
  490.   object CopyBtn: TBitBtn
  491.     Left = 72
  492.     Top = 260
  493.     Width = 62
  494.     Height = 27
  495.     Caption = '&Copy'
  496.     Font.Color = clBlack
  497.     Font.Height = -11
  498.     Font.Name = 'MS Sans Serif'
  499.     Font.Style = []
  500.     ParentFont = False
  501.     TabOrder = 9
  502.     OnClick = CopyBtnClick
  503.     Glyph.Data = {
  504.       56070000424D5607000000000000360400002800000028000000140000000100
  505.       0800000000002003000000000000000000000000000000000000000000000000
  506.       80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
  507.       A600000000000000000000000000000000000000000000000000000000000000
  508.       0000000000000000000000000000000000000000000000000000000000000000
  509.       0000000000000000000000000000000000000000000000000000000000000000
  510.       0000000000000000000000000000000000000000000000000000000000000000
  511.       0000000000000000000000000000000000000000000000000000000000000000
  512.       0000000000000000000000000000000000000000000000000000000000000000
  513.       0000000000000000000000000000000000000000000000000000000000000000
  514.       0000000000000000000000000000000000000000000000000000000000000000
  515.       0000000000000000000000000000000000000000000000000000000000000000
  516.       0000000000000000000000000000000000000000000000000000000000000000
  517.       0000000000000000000000000000000000000000000000000000000000000000
  518.       0000000000000000000000000000000000000000000000000000000000000000
  519.       0000000000000000000000000000000000000000000000000000000000000000
  520.       0000000000000000000000000000000000000000000000000000000000000000
  521.       0000000000000000000000000000000000000000000000000000000000000000
  522.       0000000000000000000000000000000000000000000000000000000000000000
  523.       0000000000000000000000000000000000000000000000000000000000000000
  524.       0000000000000000000000000000000000000000000000000000000000000000
  525.       0000000000000000000000000000000000000000000000000000000000000000
  526.       0000000000000000000000000000000000000000000000000000000000000000
  527.       0000000000000000000000000000000000000000000000000000000000000000
  528.       0000000000000000000000000000000000000000000000000000000000000000
  529.       0000000000000000000000000000000000000000000000000000000000000000
  530.       0000000000000000000000000000000000000000000000000000000000000000
  531.       0000000000000000000000000000000000000000000000000000000000000000
  532.       0000000000000000000000000000000000000000000000000000000000000000
  533.       0000000000000000000000000000000000000000000000000000000000000000
  534.       0000000000000000000000000000000000000000000000000000000000000000
  535.       0000000000000000000000000000000000000000000000000000000000000000
  536.       000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
  537.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303
  538.       03030303030303030303030303030303030303030303FFFFFFFFFFFFFFFFFFFF
  539.       0303030303030303030000000000000000000003030303030303030303F8F8F8
  540.       F8F8F8F8F8F8F8FF03030303030303030300FFFFFFFFFFFFFFFF000303030303
  541.       0303030303F8FF03030303030303F8FF03030303030303030300FBFFFBFFFBFF
  542.       FBFF0003030303030303030303F8FF03FFFFFFFFFFFFF8FF0303030303030303
  543.       0300FFF8F8F8F8F8F8FF0003030303030303030303F8FFF8F8F8F8F8F803F8FF
  544.       03030303030303030300FBFFFBFFFBFFFBFF00030303030303FFFFFFFFF8FF03
  545.       FFFFFFFFFFFFF8FF03030303000000000000FFF8F8F8F8F8F8FF000303030303
  546.       F8F8F8F8F8F8FFF8F8F8F8F8F803F8FF0303030300FFFFFFFF00FBFFFBFFFBFF
  547.       FBFF000303030303F8FF030303F8FF03FFFFFFFFFFFFF8FF0303030300FFFFFF
  548.       FF00FFF8F8F8F8F8F8FF000303030303F8FF030303F8FFF8F8F8F8F8F803F8FF
  549.       0303030300FF07070700FBFFFBFFFBFFFBFF000303030303F8FF030303F8FF03
  550.       0303030303FFF8FF0303030300FFFFFFFF00FFFFFFFFFFFF0000000303030303
  551.       F8FF030303F8FF0303030303F8F8F8030303030300FF07070700FBFFFBFFFBFF
  552.       0000030303030303F8FF030303F8FFFFFFFFFFFFF8F803030303030300FFFFFF
  553.       FF000000000000000003030303030303F8FF030303F8F8F8F8F8F8F8F8030303
  554.       0303030300FF070707070707FF0003030303030303030303F8FF030303030303
  555.       03F8FF03030303030303030300FFFFFFFFFFFFFFFF0003030303030303030303
  556.       F8FF030303030303FFF8FF03030303030303030300FFFFFFFFFFFF0000000303
  557.       0303030303030303F8FF0303030303F8F8F80303030303030303030300FFFFFF
  558.       FFFFFF00000303030303030303030303F8FFFFFFFFFFFFF8F803030303030303
  559.       030303030000000000000000030303030303030303030303F8F8F8F8F8F8F8F8
  560.       0303030303030303030303030303030303030303030303030303030303030303
  561.       0303030303030303030303030303030303030303030303030303030303030303
  562.       0303030303030303030303030303030303030303030303030303}
  563.     Margin = 2
  564.     NumGlyphs = 2
  565.     Spacing = -1
  566.     IsControl = True
  567.   end
  568.   object DelBtn: TBitBtn
  569.     Left = 136
  570.     Top = 260
  571.     Width = 27
  572.     Height = 27
  573.     Hint = 'Delete macro|'
  574.     TabOrder = 10
  575.     OnClick = DelBtnClick
  576.     NumGlyphs = 2
  577.     Spacing = -1
  578.     IsControl = True
  579.   end
  580.   object PopupMenu1: TPopupMenu
  581.     Left = 184
  582.     Top = 256
  583.     object PopupMenu: TMenuItem
  584.       Caption = 'Execute'
  585.       ShortCut = 0
  586.       OnClick = MacroListDblClick
  587.     end
  588.     object N1: TMenuItem
  589.       Caption = '-'
  590.       ShortCut = 0
  591.     end
  592.     object New1: TMenuItem
  593.       Caption = 'New'
  594.       ShortCut = 0
  595.       OnClick = NewBtnClick
  596.     end
  597.     object Copy1: TMenuItem
  598.       Caption = 'Copy'
  599.       ShortCut = 0
  600.       OnClick = CopyBtnClick
  601.     end
  602.     object Delete1: TMenuItem
  603.       Caption = 'Delete'
  604.       ShortCut = 0
  605.       OnClick = DelBtnClick
  606.     end
  607.   end
  608. end
  609.